home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
C!T ROM 3
/
ct-rom iiib.zip
/
ct-rom iiib
/
WINDOWS
/
GRAFISCH
/
TRIBALDR
/
RES.ZIP
/
PENPOP.WDL
< prev
next >
Wrap
Text File
|
1993-10-09
|
4KB
|
187 lines
Window penPop
class: PenPop
title: "Attribute Editor"
border: dialog
help: "set shape attributes"
fixedRect: (0 0 144 134)
Child solid
class: BitButton
left: (f 0)
top: (f 0)
right: (self left f 43)
bottom: (self top f 10)
help: "solid line"
Child dash
class: BitButton
left: (f 0)
top: (last bottom f 1)
right: (self left f 43)
bottom: (self top f 10)
help: "dashed line"
Child dot
class: BitButton
left: (f 0)
top: (last bottom f 1)
right: (self left f 43)
bottom: (self top f 10)
help: "dotted line"
Child dashDot
class: BitButton
left: (solid right f 1)
top: (f 0)
right: (self left f 43)
bottom: (self top f 10)
help: "dash-dot line"
Child dashDotDot
class: BitButton
left: (last)
top: (last bottom f 1)
right: (self left f 43)
bottom: (self top f 10)
help: "dash-dot-dot line"
Child invisible
class: BitButton
left: (last)
top: (last bottom f 1)
right: (self left f 43)
bottom: (self top f 10)
help: "invisible line"
Child onepoint
class: BitButton
left: (dashDot right f 3)
top: (f 1)
right: (self left f 10)
bottom: (self top f 30)
help: "select 1 unit wide"
Child twopoints
class: BitButton
left: (last right f 1)
top: last
right: (self left f 10)
bottom: (self top f 30)
help: "select 2 units wide"
Child threepoints
class: BitButton
left: (last right f 1)
top: last
right: (self left f 10)
bottom: (self top f 30)
help: "select 3 units wide"
Child fourpoints
class: BitButton
left: (last right f 1)
top: last
right: (self left f 10)
bottom: (self top f 30)
help: "select 4 units wide"
Child lineWidth
class: LineScrollBar
top: (last bottom)
left: (f 0)
right: (self left f 136)
bottom: (self top f 9)
data: (0 50)
selection: 1
help: "line width 0<-->50"
Child blackpen
class: BitButton
left: (f 0)
top: (lineWidth bottom f 2)
right: (self left f 17)
bottom: (self top f 17)
help: "select black line"
Child whitepen
class: BitButton
left: (last right f 0)
top: last
right: (self left f 17)
bottom: (self top f 17)
help: "select white line"
Child bluepen
class: BitButton
left: (last right f 0)
top: last
right: (self left f 17)
bottom: (self top f 17)
help: "select blue line"
Child magentapen
class: BitButton
left: (last right f 0)
top: last
right: (self left f 17)
bottom: (self top f 17)
help: "select magenta line"
Child cyanpen
class: BitButton
left: (last right f 0)
top: last
right: (self left f 17)
bottom: (self top f 17)
help: "select cyan line"
Child greenpen
class: BitButton
left: (last right f 0)
top: last
right: (self left f 17)
bottom: (self top f 17)
help: "select green line"
Child redpen
class: BitButton
left: (last right f 0)
top: last
right: (self left f 17)
bottom: (self top f 17)
help: "select red line"
Child yellowpen
class: BitButton
left: (last right f 0)
top: last
right: (self left f 17)
bottom: (self top f 17)
help: "select yellow line"
Child red
class: PopScrollBar
top: (last bottom f 1)
left: (f 0)
right: (self left f 136)
bottom: (self top f 9)
data: (0 255)
selection: 128
help: "select red 0-255"
Child green
class: PopScrollBar
top: (last bottom)
left: (f 0)
right: (self left f 136)
bottom: (self top f 9)
data: (0 255)
selection: 128
help: "select green 0-255"
Child blue
class: PopScrollBar
top: (last bottom)
left: (f 0)
right: (self left f 136)
bottom: (self top f 9)
data: (0 255)
selection: 128
help: "select blue 0-255"
Child ok
class: Button
title: "OK"
left: (f 0)
top: (last bottom )
right: (self left f 136)
bottom: (self top f 18)
Child helpLine
class: HelpBar
border: border
top: (last bottom)
left: (f 0)
right: (self left f 136)
bottom: (self top f 20)
font: Helv8
help: "explains choices"